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“OT SUPPLIED BY DIGITAL, 
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1,8 APSTRACT, 
THIS PROGPAY 18 DESIGYED AS A “MAINTENANCE AIO FOP 
FIELO SERVICE PERSONEL, IT wILL VERIFY THE PROPER OPERATION 
OF A COMPLETE COMMUNICATION LINK FROM ONE POP©11 
SYSTE“ TO ANOTHER OR TO A COMMUNICATION TEST CENTER, 


THIS PROGPA“Y “UST BF USED 1% CONJUNCTION aITH THE INTEPPROCESSOR 
TEST PROGPA“(NZITP) ON A PHPo11 SYSTE™ WITH A DLeli INTEPFACE, 


2,0 REQUIREMENTS, 
2,1 EOQUIPYENT 


A, ®P0Pei! SYSTEM WIT4 4x OF COPE, 
6, A DH11 COMMUNICATION INTERFACE, 


2,2 STORAGE, 
4K OF CORE 
3.9% LOADING PPOCENUPE 


THIS PROGPAM IS I” ABSOLUTE FOP“aT, 
THE A®S§ LOADER “UST HE USED TO LOAD THE PROGRAM, 


4,0 OPERATING PROCECUPES, 


A, T40 “ETHODS OF ENTERING PARAMFTERS APE PROVIDFD 
1, LOAD ADDRESS 200 AND START TO ENTER PARAMS FROM CONSOLE TTY, PROCEED TO SECTION 8, 
2. LOAD ADMRESS 207 AND SET SWITCH PEGISTER BIT 15 BEFORE 
STARTING TO ENTER PARAWS FPO CONSOLE SWITCHES, PROCEFD TO SECTION C, 
eTHE PPOGPAY MAY BE PFSTARTFED AT LOC 244 (ONCE PARAMETERS HAVE ALREADY BEEN SELECTED) 


B, CONSOLE DIALOGUF PARAMETER INPUT (CURRENT VALUES FOR PARAMETERS ARE FOUND IN OVERLAY) 


1, THE PFOGRA™ WIL] TYPEOUT THE “AYE OF THE VARIABLE OVERLAY, 
A. IF YOU WISH TO SETUP JUST THE INDICATED OVERLAY, TYPE A CARAGE RETURN 
68, IF YOU WISH TO SETUP A DNI1, TYPE IN DN, 
C. IF YOU wISH TO SETUP A D¥34R8, TYPE IN DMB, 


IF Dw OP DMA WAS TYPED IN STEP 1 ABOVE THEN THE BUS ANDRESS, 
VECTOP ETC, REFFRED 10 IN STEPS 2 THRU 7, PERTAIN TO THE ON14 OR DMBB, 


2. THF PROGRAM SILL TYPE THE DEFAULT BUS ADDRESS OF THF INTERFACE UNDER TEST, 
A, TYPE A CAP, RETURN TO USE DFFAULT BUS ADDPESS 
B, TYPEIN ACTUAL BUS ADDRESS 


3, THE PROGRAM wILL TYPE OUT THE DEFAULT VECTOR ADDRESS 
A, TYPE A CAR, RFTURN TO USE DEFAULT ADDRESS 
8, TYPEI® ACTUAL VECTOR ADDPESS 


4, THE PROGRAM wILL TYPE OUT THE DEFAULT INTEPFACE PRIORITY 
NOTES 2°@SPRIO 4, 2408FR10 5S, 3°PSPRIO 6, ETC, 
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A, TYPE A CAR, RETURN TO USE DEFAULT VALUE 
6, TYPEIN ACTUAL VALUE 


THE PRPOGRAP BILL TYPEOUT THF DEFAULT VALUE OF PARAWEs 

IF REQUIRED BY THE ISR, (SFE SECT, 14,0 IN OVERLAY LISTING FOR PARAMETER DESCRIPTION) 
A, TYPE & CAP, RETURN TO USE DEFAULT VALUE 

8, TYPEIN ACTUAL VALUE 


THE PPOGRAW WILL TYPEOUT THF DEFAULT VALUF OF PARAMe2 
If PEQUTPED AY THF TSP, 

A, TYPF A CAP, RETURN 10 USE DEFAULT VALUE 

®, ENTER ACTNAL VALUE 


THE PFOGKAM wILL TYPEOUT THE DEFAULT VALUE OF PARAMe3 
1F REQUIRED BY THE OVERLAY, 
A, TYPE A CAP, PETURN TO USE DEFAULT VALUE 
THE DNel{ WILL USE PAPA“ 63 AS THF 6 TO OTAL, 
TF USING A “ODE WITHOUT AUTOMATIC HANDSHAKING, 
THE NUMBER “UST TERMINATE wITH A 
*ENDeOF eNIMRER® CHARACTER (3), 
8, ENTER ACTUAL VALUE, 


THE PROGRAM wILL PETURN TO STFP 61 IF THIS SETUP 
w4s FOR O31 OF 044188, 


THE PPOGRAY WILL REQUEST THAT SWITCH REGISTFR BE SET, 
A, SETUP S#ITCH PEGISTFR AS SPECIFIED IN STEP D, 
AND TYPE A CAR, RETURN, 


“OTF; IF ANY OF THE ABOVE ITE“S 2 THRU 7 WERE CHANGED BY ENTERING 
NEW VALYES, THE NEW VALUE BECOMES THE DEFAULT VALUE FOR SUBSEQUENT 
RESTARTS OF THE PROGRAM, 


Cl 
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S. MSMANUAL PARAYETER INPUT FROM SWITCH PEGISTER 
1, THE PRPOGPA™ HALTS FOR ISPCINTERFACE SERVICE ROUTINE) SPECIFICATION 
S4R14SStTUP DYe118 Isp 
S4R13RSSFTUP Chott ISR 
S4PSO%VOPSSETUP VARIABLE ISP 


2, THE FOLLOWING HALTS ARE PEPEATED FOP EACH ISR SPECIFIFD, 
SETUP SFOVEKCE 1S: ON11,0%110R8 THEN VAPIABLE OVERLAY, (EACH ENTRY SET SWICHES THEN HIT CONTINUE,) 
A, HALT FOP BUS ADDRESS OF INTFPFACE 
B®, HALT FOR VECTOR ADDPFSS OF INTEPFACE 
C. MALT FOP PRIOPITY OF INTERFACE 
D. HALT FOP INTEPPACE PARA“ 61 (SEE SECT, 10,0 IN OVERLAY LISTING FOR PARAMETER DESCRIPTION) 
E, HALT FOR INTERFACE PARA“ 02 (0N1] AND D“8B PARAMETERS APE DISCUSSED IN SECT, 10,0 OF THE MONTTOR, 
*, GO PACK TO STEP A IF THIS SETUP WAS FOR OW Of OB, 


3, HALT FOP OPFRATIONAL SWITCK SFTTINGS, (SEE STEP 0,) 
A, PPESS CONTINUE TO START TESTING 


BEFORE ATTE*PTING TO RUN THIS PROGRA®*, THE OPERATOR MUST 
ACCERTAIN THE COMPLETE CO“MUNICATION LOOP AND PROCEEDURES 

70 BE USED, INCLUDING THE TYPE OF MODEMS, THE TYPE OF 

INTERFACE BEING USED AT THE OTHER CPU AND THE “ODES OF OPERATION, 
DATA AND PARAMETERS TO ®E USED PT ESCH CPU, 


THIS sILL RFQUIPED VOCAL CO¥“MUNICATION SITH THE OPERATOR 
AT THE OTHER Cpl UNLESS ITS CONFIGURATION AND OPERATION 
APE FIXED AS A TEST CENTER, 


AFTER OFTER“INING THAT THE FQUIPMFNTS APE COMPATIBLE AND 
AGREEING ON THE MODE AND VARIABLE PAPAPETERS TO KE USED, 
THE SYSTF“ wHICH Ig TO RECEIVE DATA FIRST SHOULD BE 

LOADED AND STARTEC, IF THE MODE“ BEING USFD ON THIS SYSTEM 
HAS AN AUTOMATIC ANSatR FEATUPE, IT SHOULD RE ENAALED, 


THE SYSTEY WHICH IS TO TRANSIT FIPST SHOULT THEN BE LOADED 
AND STARTED AND THE CCNNECTION ESTABLISHED FITHER “ANUALLY 
OP AUTOMATICALLY (VIA DNeolt), 
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D, OPERATIONAL SWITCH SETTINGS, 
$1501 HALT OW ERROR 
SWiéei SINGLE Pass 
$014 WAS NO EFFECT IF swatéee 
S4i3e1 INHIBIT ERROR TYPEOUTS 
S4i2e1 INHIBIT ALL TYPEOUTS EXCEPT ERPORS 
IF $#128@ AND SWe4e1 END PASS IS TYPED 
AND TPANSPITTED/RECFIVED DATA IS TYPED, 
S*lisi USF PREVIOUSLY SPECIFIED DATA 
$410e81 DATA SFLECT (WITH Sweg) 
$409s1 DATA SELECT (ITH Shi) 
@¢@s1 GET DATA FROY OPERATOR 
Misi TEST MESSAGE 01 (6A QUICK BROWN FOX) 
1@s1 TEST MESSAGE 02 (68 NUMEPICS) 
iisi TEST MESSAGE 63 (6C COMTEST/QUICK BROWN FOX/NUYERICS) 
$400e1 TPAYSYIT RECEIVED DATA (INTERNAL LOOPBACK MODE) 
S4e7s81 0O NOT TEST RECEIVED DATA 
$40601 “ONITOR TRANSMITTED DATA ON CONSOLE TTY,© 
S#OSei “ONIJTOR PECEIVFD DATA OW CONSOLE TTY,@ 
© IN MANY CASES, NOT ALL PATA wILL APPEAR ON THE CONSOLE 
TTY, THIS IS ESPECIALLY TRUE WHEN THE COMM INTERFACE I5 
RUNNING AT A FASTER BAUD THAN THE CONSOLE, BUT EVEN AT EQUAL 
OR SLOwER BAUDS, ALL CHARACTERS PAY NOT APPEAR ON THE CONSOLE, 


S4@4s1 PETURN TO “ONITOR FOR END PASS 
WHEN su?4e@ PROGRAM LOOPS IN THE OVERLAY NEVER RETURNING TO THE MONITOR, 
$42381 INTERNAL LOOPBACK “ODE 
$4O2e1 EXTERWAL LOOPBACK MODE 
SH89181 ONE owAYeIN MODE 
$99081 ONE ocrAYeoOUT MONE 
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THIS PROGPAY HAS PEEN MODIFIED TO RUN ON A PROCESSOR WITH OR WITHOUT 
A HARDWARE SWITCH REGISTER, eHEW FIRST FXECUTED THE PROGRAM TESTS 
THE EXISTENCE OF A HARDWARE SWITCH REGISTER, IF NOT FOUND A 

SOFTGARE SeITCH REGISTER LOCATION (SWREGSLOC, 176 ) IS DEFAULTED 10, 
If THIS IS THE CASE, UPOW EXECUTION THE CONTENTS OF THE SUPFG ARE 
DUMPED IN OCTAL ON THE CONSOLE TTY AND ANY CHANGES ARE REQUESTED 


(1&) SaPeXXXXxX NEwe 
POSSIBLE PESPONSES APE: 


1, <CR> IF WO CHANGES APE TO BE MADE 

2. 6 DIGITS #07 TO PEPRESENT IW OCTAL THE NEW SWITCH PEGISTER 
VALUE sLAST DIGIT FOLLOWED AY <CR>, 

3, °U TO ALLOW PEENTERING VALUE IF ERROR IS COM“ITTED 


KEYING IN SWREG VALUE, 


BUILT INTO THE PROGRAY Ig THE APILITY TO DYNAMICALLY CHANGE THE 
CONTE‘TS OF SWREG DURING PROGRAM FXECUTION, BY STRIKING °G 

(CNTL G) ON CONSOLE TTY THE OPERATOR SETS A REQUEST FLAG TO CHANGE 
THE CONTENTS OF SwREG, WHICH IS PROCESSED IN KEY AREAS OF THE PROGRAS 
CODE (1E) EPROP POUTINES, AFTER HALTS END OF PASS, AND OTHER 
APPLICABLE AREAS, 


IF OPERATOR SPECIFIED DATA WAS INDICATED, THE prOGRAM WILL TYPE A 
REQUEST FOR THE DATA, DATA MAY RE ENTERED AS ASCII CHARACTERS OR OCTAL CONE, 
TYPE IN THE DATA TERMINATED wITH A Ck, OCTAL CODE MAY BE ENTERED 6Y TYPING AN 
“(UP ARROw) FOLLOWED By THE OCTAL CODE (IN THE RANGE 9@@ TO 377) 
SEPERATED BY SPACES AND TERMINATED By “(CUP ARROW), 

1,E, APCD° 800 123 377° EFG (CAP, PETURN) 


A TYPICAL SWITCH SETTING FOR HALFeDUPLEXs9031$@ THIS SETTING USES 
INTERNAL LOOPBACK MODE, LOOPS IN OVERLAY, MONITORS TRANSMITTED AND RECEIVED 
DATA ON THE CONSOLE TTY, AND TESTS RECEIVED DATA USING TEST MESSAGE 03, 


A TYPICAL S#1TCH SETTING FOR FULL@DUPLEXs003144 THIS SETTING 
IS THE SAME AS ABOVE FXCEPT IT USES THE EXTERNAL LOOPBACK MODE, 


ALL STANDARD MESSAGES(TFEST “ESSAGES 13) ARE PRECEDED BY 2 FILL CHARACTERS(177), 
AND ARE FOLLOWED BY A CR(@15), LF(@12),PECEIVE TERMINATING CHARACTER(@@1), 

4 FILLS(177), AND A TRANS“IT TERMINATING CHARACTER(@00), DUPING TRANSMISSION, 
@HEN A JO” CHARACTER TS SEEN THE TRANSMISSION IS STOPPED,DURING RECEPTION, 

@4EN A 001 CHARACTER IS RECEIVED, THE PECEIVER IS SHUT OFF, 

IF THE “ESSAGE WAS INPUTED BY THE OPERATER, THE TERMINATING CHARACTERS ARE ADDED, 
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TEST “ODFS 
INTFRNAL LOOPBACK MODE 


1. THE OVERLAY wAITS TO RECEIVE A MESSAGE (TERMINATED BY <@91>) 
2. VERFIES THE DATA AGAINST THE DATA SELECTED BY SWHO AND SW1O(gw7s@) 
3, TRANSYIT THE DATA SELECTED BY SWO9 AND SW1@ (SWOee) OR 
TRANSMIT THE RECEIVED DATA (SW681) 
4. PETURNS TO “ONITOP FOR “END PASS" (SW4e1) OF 
GO TO STEP 1, (Sw4e@) 


EXTERNAL LOOPBACK MODE 


1, THE OVERLAY SETS REQUEST TO SEND 

2. AIT FOP CLEAR TO SEND 

3, TRANSPITS THE SELECTED DATA 

4. RESETS PEQUEST TO SEND 

S, WAIT FOR MESSAGE TO BE RECEIVED 

6. VERTFIES THE DATA (S$W0780) 

7. RETURNS TO “MONITOR FOP "END PASS", (Se@4e1) OR 
GO TO STEP 1(Swa420) 


ONEeonAYeoIN “ODE 


1, THE OVERLAY WAITS FOR MESSAGE TO BE RFCEIVED, 

2. VERIFIES THE DATA(S#e780) 

3, RETURNS TO MONITOR FOR “END PASS"(540421) OR 
GO TO STEP 1 (SW04e0) 


OXEewAYoOUT MODE 


1, THE OVERLAY SETS REQUEST TO SEND 

2. WAITS FOR CLFAP TO SEND 

3. TRANSMITS SELECTED DATA 

4, RETURNS TO “ONITOR FOR “END PASS", (SW0421) OR 
GO TO STEP 1 (SWO4és0) 


E, THE OVERLAY IS THEN ENTERED AND A CONNECTION ESTABLISHFD EITHER 
MANUALLY OR AUTOMATICALLY, 


IF ONEewAYeoTN OR INTERNAL LOOPRACK MODES ARE SELECTED, 
THE OVERLAY wILL SET DATA TERMINAL READY AND wAIT FOR DATA, 


IF ONEedAYeOUT OR EXTERNAL LOOPBACK MODES WERE SELECTED, 

THE OVERLAY WILL SET DATA TERMINAL READY AND RFQUEST TO SEND, 

THE OVEPLAY WILL THEN WAIT FOR CLFAP TO SEND BEFORE ATTEMPTING TO 
TRANS“IT DATA, 


THE PROGRAM @ILL PRINTOUT A “WAITING FOR CLEAR TO SEND*® 
MESSAGE AND THE CONTENTS OF THE XMIT CSP EVERY 60 SECS, 
UNTIL CLEAR TO SEND IS ASSERTFD, 
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fF, IF S040 THE OVERLAY WILL CONTINUE TO 
TPANSMIT/PECFIVE DATA, 


IF Sw@6ei THE OVERLAY WILL PETUPN 
TO THE “ONTTOP AND TYPE “END PASS", 


IF BOTH SwWO4e1 AND Swiéet, THE PROGRAM WILL REQUEST 
NE@ INTERFACE PARAMS AFTER OWE PASS OF THE SELECTED 
TEST “ONE, 


TEST EXECUTION “AY BE INTERRUPTED BY TYPING THE FOLLOWING 
CHARACTERS OWN THE CONSOLE TTY, 
LIVE FEED & RESTART PPOGRAM AT LOCATION 200, 
QUESTION MAPK © PPINTOUT FIRST 8 WORDS OF INPUT BUFFER, (ASCII) 
THEN TYPE EITHER: 
@wRAXERK TO PRINTOUT THE @ WORDS 
AT LOC XXXXXUX, 


@BXXXXXX TO PRINTOUT THE 16 BYTES 
AFTER LOC XXXXXxK, 


ec TO CONTINUE 


PROGRAM MUST BE PESTARPTED AT 200 AFTER PRINTING, 
CARRIAGE RETUPN s&s RESTART AT REQUEST FOP NEW OPERATIONAL SaITCHES, 


PROGRAM AND/OP OPERATOR ACTION 


If THE OPERATOR WISHES TO MANUALY EXAMINE THE TRANS“IT OR RECEIVE 
BUFFERS, DO THE FOLLOWING; TO FIND THE STARTING ADDRESS OF THE RECEIVE 
BUFFER, LOAD ADDPESS 11020 AND EXAMINE, TO FIND TWE STARTING ADDRESS 
OF THE TRANSMIT BUFFER, LOAD ADDRESS 11022 AND EXAMINE, 


WORMAL HALTS 
SEE SECTION 4, 


ERRORS 
ERPOR REPORTING 


THE ONLY EPROR PEPOPT FROM THE CONTPOL PPOGRAM OCCURS IF THE 
INTERFACE SPECIFIED IS NOT LOADED, 


IF DATA TS RECEIVED AND SWITCH 7 (NO DATA COMPARE) 
1S RESET, THE OATA WILL BE COMPARFD AGAINST THE PRESELECTED 
DATA AFTER A LINE FEED CHARACTER IS PECEIVED, IF THERE IS A 
MISMATCH, THE FOLLOsING ERROR PEPORT 1S PRINTED? 


RECEIVED DATAsRPRPRP 
DATA SHOULD BE TTITTT 
DATA COMPARE ERROP; BAD DATASBBB GOOD DATASGGG 


Hl 
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@HERE RARPPRR IS THE RECEIVE BUFFER (UP TO S12 CHARACTERS) 
TTTTTT IS THE TRANSIT BUFFER (UP TO 512 CHARACTERS) 

888 18 THE BAD DATA CHARACTER 

GGG IS THE GOOD DATA CHAPACTER 


IF THE INTEPFACE DETECTS A DATA EPROR, THE FOLLOWING 
WILL BE PRINTED BEFORE THE DATA 1S COMPARED: 


THERE @AS A RECEIVER ERROP, RECEIVER DATA REGISTER @Xxxxxx 
WHERE XXXXKXX I6 THE CONTENTS OF THE RECFIVER DATA PEGISTER 


THE LOd BYTE IS THE DATA, AND THE HIGH BYTE IS THE EPROR BITS, 


IF & RECEIVE TERMINATING CHAPACTER<OO@1> IS NOT DETECTED 
WITHIN $12 CHARACTERS A *RUFFER FYULL® PRINTOUT WILL OCCUR, 


RESTRICTIONS 


THE OPERATION OF THIS PROCGPA4S RFQUIRES COORDINATION BETWEEN 
THE OPERATOR AND THE OPERATOR OF ANOTHER PDP-11 SYSTEM 
UNLESS OWE OF THE SYSTE“S IS ALWAYS OPERATING IN A FIXED 
MODE, THE FOLLOWING TABLE LISTS THE VALID COMBINATIONS, 


cPu ei Cpu 82 

ONE owAYoOUT ONE oWAYoIN 

ONEowAYoIN ONEowAYoOUT 

EXTERNALeLOOPBACK INTERWALeLOOPRACK 
INTERNALCLOOPRACE EXTERNALeLOOPRACK 
EXTERNALecLOOPBACK EXTEPNALeLOOPBACK (FULL DUPLEX) 


WHEN THE COMMIINTCATION LINK INVOLVES MODE“§S THE FOLLOWING 
RESTRICTION APPLY? 


IF RUNNING IN FULL DUPLEX MODE BOTH SYSTEMS 
“UST BE IN EXTERNAL LOOP BACK MODE, 


BOTH SYSTEMS SHOULD BE PUNNING TDENTICAL ROUTINES, 
EXAMPLE? 

S#ITCHES 14,13,7,4 SHOULD RE THE SAME 

ON BOTH CPU § 


IF PROGRAY TS WAITING IN A SCAN ROUTINE AND TYPES OUT 

A "WAITING MESSAGE*,IF AN INCOMING MESSAGE STARTS DURING 
THE TYPE OUT, IT WILL BE LOST BECAUSE THE TYPEOUT PRIORITY 
1S AT LEVFL 7, THIS #ILL RESULT IN OVERRUN OR SILO OVER] 
RUN ERRORS, DEPENDING ON THE DEVICE,TO AVOID THIS SITUATION 
RUN @ITH SWITCH 13 UP, IF OVERRUN DOES OCCURE DURING A 
TYPEOUT THE PPOGRAM SHOULD BE RESTARTED, 


IF USING AN ASYNCRONOUS DFVICE, MODEMS AND THE 

MAYNARD TEST STATION ANDO INITALIZE DOES NOT CLEAR THE 
CONNECTION (EXAMPLE THE DJ11) IF THE PROGRAM I§ RESTARTED 
IN THE MIDDLE OF A MESSAGE AT LOC 204 OR BY HITTING CR 

AN I™MEDEATE ERPOR “ESSAGE FROM MAYNARD WILL BE REeo 


oe ee oe ell ae 
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CEIVED, THIS I8 BECAUSE THE TEST STATION I6 STILL LOOKING 
FOR THE REST OF THE INTEPUPTED MESSAGE, TO AVOID THIS 
ERROR , RESTAPT PROGRAM ONLY AT THE END OF THE MESSAGE 
CURRENTLY BEING TRANS“ITTED, 


“I SCELLANEOUS 


ITEP WAS CHECKED OUT USING THE FOLLOWING BELL TELEPHONE MODESS, 
201A CHALFeDUPLEX SYNCHRONOI'S 2000 BAUD) 

202C (HALFeDUPLEX ASYNCHRONOUS 12¢@ BAUD) 

103A (FULL@DUPLEX ASYNCHRONOUS 11? RAUD) 


PROGRAM DESCRIPTION 


THE DHi1 INTERFACE SERVICE PAPAMS ARE SETUP, AS SPECIFIED BY THE OpERATOR, 
BY THE ITEP CONTROL PROGRAM, 


TIME, PROVIDES A “EANS OF MEASURING ELASPED TIME, IT IS INCREMENTED 
EVERY SECOND By A CLOCK INTERRUPT ROUTINE IN ITEP, 


WHEN THE OVERLAY IS FIRST ENTERED BY ITEP AT LOCATION STAPT?, 
THE CONTENTS OF THE SWITCH REGISTER ARE STORED IN REGISTER 0, 
THE MODE AND DATA SELFCTIONS ARE FIXED at THIS TIME AND CANNOT 
BE ALTERED wITHOUT RETURNING TO THE CONTROL PROGRAM, 

THE INTERRUPT VECTORS AND VARIABLES ARE THEN SETUP, 

THE SELECTED POUTINE DETERMINED BY THE “ODE Ig THEN ENTFRED 


THE OVERLAY THEN LOOPS Iw ROUTINES: SOW! ,IF "ONE WAY IN*® “ODE 
WAS SELECTED, s$0WO,1F “ONE WAY OUT*® MODE WAS SELECTED, 

eIL8, IF “INTERNAL LOOP BACK® MODE WAS SELECTED, 

SXL8,I1IF “EXTERNAL LOOP BACK" WAS SELECTED, 


SO#ls IN THIS ROUTINE THE RECFIVER IS INITIALIZED AND PPOGRAM 
LOOPS WAITING FOP THE RECEIVER TO FINISH, IF NOTHING Ig PECEIVED 
FOR 67 SECS A “WAITING® “ESSAGE 15 TYPED, WHEN THE RECEIVER Is 
DONE, THE PROGRA“ CHECKS DATA IF SWITCHES PERMIT,AND TYPES END 
PASS DEPENDING OW SwITCH SETTINGS, 


$040; THE TRANS“ITTER IS INITIALIZED AND PROGRAM LOOPS 

WAITING FOP TRANSMITTER TO FINISH,A “aAITING® MESSAGE IS TYPED 
EVERY 60 SECS IF THERE Is NO ACTION, WHEN THE TRANSMITTER IS 
DOWE, THE PROGRAM EITHER LOOPS BACK "10 sOwO OF TYPES ENO PASS 
DEPENDING ON SWITCH SETTINGS, 


SILBs THE RECFIVER TS INITIALIZED AND PROGRAM LOOPS WAITING FOR 
RECEIVER TO FINISH, A “WAITING® MESSAGE IS TYPED EVERY 6@ SEC 

IF “O ACTION, WHEN RECEIVER IS DONE prROGRAM CHECKS DATA IF swITCH 
SETTINGS PERMIT, AND END FASS IS TYPED IF SWITCH SETTINGS PERMIT, 
THEN THE TRANSMITTER IS INITIALIZED, A "WAITING" MESSAGE Ig TYPED 
EVERY 6@ SEC IF NO ACTION, wHEN TPANS“ITTEP IS DONE PROGRAM RETURNS 
TO START OF ROUTINE, (SILB) 


6XL83 IF IN HALF DUPLEX THE TRANSMITTER IS INITIALIZED, 
A °@AITING MESSAGE 15 TYPFD EVERY 64 SEC IF THERE IS NO ACTION 


eetw ee 


S/ 
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@HEN THE TRANSMITTER IS DOWE THE RECEIVER IS INITIALIZED 

oA “WAITING MESSAGE IS TYPED EVERY 6@ SEC IF THERE IS WO ACTION, 
WHEN THE PECETVER IS DONE,DATA I§ CHECKED IF SWITCH SETTINGS 
PER“IT AND END PASS IS TYPED IF S4ITCWES ALLOW, THE PROGRAY POW 
REPEATS CYCLE STARTING AT 6XLB, 

IF IN FULL DUPLEX THE RECFIVER AND TRANSMITTER ARE INITIALIZED 

¢ A “WAITING® “FSSAGE IS TYPED FVYERY 6@ SEC IF THERE Ig nO 
ACTION, WHEN BOTH THE RECEIVER AND TRANSMITTER ARE DOWNE,DATA I 
CHECKED, END PASS IS TYPED AND PROGRA” LOOPS TO 6XLB DEPENDING 
ON THE SWITCH SETTINGS, 


THE RETUPN TO MONITOR ROUTINE FOR END PASS AT EOP: 

LOCKS OUT INTERUPTS AND SAVES THE TRANS“ITTER INTERRUPT EWABLE 
BIT AND ALL GENERAL REGISTERS, IT THEN RETUPNS TO THE MONTTOR 
TO TYPE “EWM PASS", THE MONITOR CHECKS Swi4 IF UP IT PETURNS 
TO ENTERs, OTHERWISE IT PESTARTS THE PROGRAM, 


ENTER: TS ENTERED FROM™ THE “ONITOP AFTER TYPEING “END PASS", 
IT RESTORES THE GENERAL REGISTERS AND THE TRANS“ITTER Csr 

AS SAVED IN EOP, THE DELAY FLAG IS SET AND PROGRA“ RETURNS TO 
THE SCAN ROUTINE(O80,0W1,ILA,XLB) WHERE IT CAME FROM, 


THE INITIALIZE TRANSMIT SUBROUTINE AT STAPTX: 

SETS UP THE INTERFACE AND POINTERS NECESSARY TO 

INITIATE A TRANS¥IT OPERATION, 

AFTER SETTING "DATA TERMINAL READY® AND *REQUFST TO SEND® A CRECK 
TS MADE ON PAPAM2 TO DETERMINE IF HALF CUPLEX OPERATION 

@AS SELECTED BY THE OPERATOR, IF IT WAS, THE 

SUBROUTINE WAITS FOR CLEAP TO SEND, 

A °WATTING FOR CLEAR TO SEND’ PRINTOUT OCCURS 

EVERY 3@ SECONDS UNTIL CLEAR TO SEND IS ASSFRTED, 


THE INITIALIZE RECEIVED suUBROUTINE AT STARTR!E 
SETS UP THE INTFRFACE AND POINTERS NECESSARY TO 
RECEIVE A MFSSAGE, 


THE TRANS“IT INTERRUPT SEPVICE ROUTINE, 

AT KISRt, IS ENTEPED VIA TRANSMIT INTERRUPTS 
FROM THE INTEPFACE, 

A TEST IS MADF TO SEE IF THE LAST CHARACTER 
TRANS” ITTED WAS A NULL (ALL ZEROS) CHAPACTEP, 
IF IT WASs THE TRANSMIT LOGIC IN THE INTERFACE 
IS RESET AND THE TRANSMIT COMPLETE FLAG 1S SET, 
AT XISRis THE NEXT CHARACTER IS TRANSMITTED 

AND PRINTED ON THE TTY IF THE MONITOR TRANSIT 
S*ITCH IS SET, 


THE RECEIVE INTERPUPT SERVICE ROUTINE 

eAT RISRs, TS ENTERED VIA RECEIVER INTERRUPTS 
FROY THE INTERFACE, 

THE RECEIVED CHARACTER IS STORED {WN 

THE INPUT BUFFER AND PRINTED ON THE Try IF 
THE MONITOR RECEIVER SWITCH IS SET, 

IF THE INPUT BUFFFR IS FULL, A °BUFFER FULL? 
PRINTOUT 4ILL OCCUR, THIS INDICATES THAT A 
LINE FEFD CHAPACTER WAS NOT RECOGNIZED 


KI 
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IN THE RECEIVED DATA (WITHIN 1008 CHARACTERS), 
IF THE RECEIVED CHAPACTER Is A LINE FEED, 

THE RECEIVED LOGIC IS RESET AND THE 

RECEIVE COMPLETE FLAG IS SET, 

IF A *RECEIVE ERPOR® IS DFTECTED AT PISPs, THE 
CSR AND DBR WILL BE SAVED AND PRINTED OUT 
AFTER THE COMPLETE MESSAGE HAS BEEN RECFIVED, 


9,10 THE DATA TEST SUBROUTINE AT TESTO: IS 
ENTERED AFTER A COMPLETE “ESSAGE HAS BEFN 
RECEIVED, 

IF A °RECEIVE ERROR’ HAD BEEN DETECTED, 

THE CONTENTS OF THE “RECEIVE BUFFER® AT THE 

TIME THE ERROR OCCUPRED WILL BE PRINTFO, 

THE OATA Ig COMPAPED UNTIL A °ALL ZEROS? 

CHARACTER IS RECOGNIZED, “FILL® (ALL OWES) 

CHARACTERS ARF IGNORED, IF A “ISMATCH 

IS DETECTED, THE COMPLETE CONTENTS OF THE . 
INPUT BUFFER AND GOOD DATA IS PRINTED, 


DHi1 RESTRICTIONS 


IF A OM11BB EXISTS IN THE SYSTEM WITH THE DH11 REING 
TESTED, BUT MODEM CONTROL IS NOT DESIRED AND THE Dm118B 

WAS NOT INITALIZED BY ITEP, THE PROGRAM WILL HANG IN THE 
DHI1 TRANSPITTER INITALIZATION ROUTINE, TO CORRECT THIS 
LOAD LOCATION “DMBB" WITH AN ADDRESS THAT WILL TIME OUT(NO 
SLAVE SYNC RESPONSE), THE ADDRESS OF DMBB CAN BE FOUND 

IN THE CROSS PREFERENCE TARLE IN THE BACK OF THIS LISTING, 


575 


18,0 PARAMETERS FOP THE (H11 
PARAMs] IS LOADED INTO THE SYSTEM CONTROL REGISTER, (SCR) 


BITS 03 LINE SELECTION, DOEFAULTs LINE @ (@@0@) 
PARAMs2 IS LOADFD INTO THE LINE PAPAMETFR REGISTER, (LPR) 

BITS 4,1 CHARACTEP LENGTH, DEFAULTS 8 BITS (11) 

bIT 2 STOP BITS, DEFAULTs 2 STOP BITS (1) 

BIT 4 PARITY ENABLED (1), DEFAULTs (@) 

BIT 5 ODD PARITY (1), DEFAULTS (@) 

BITS 6°9 RECEIVER SPEED, DEFAULT® 110 BAUD (0011) 

BITS 10°13 TRANSMIT SPEED, DEFAULTS 11@ BAUD (0011) 

BIT 14 HALF DUPLEX (1), DEFAULTs FULL DUPLEX (@) 


PARAM@3 IS NOT USED (177777) 
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$95 
$96 
$97 
598 
$99 
600 
601 
602 
603 
604 
605 
606 
607 
o“s8 
609 
610 
611 
612 
613 
614 
615 
616 
617 
618 
619 
o20 
621 
622 
623 
624 
625 
626 
627 
628 
629 
634 
631 
632 
633 


634. 


635 
636 
037 
638 
639 
640 
641 
642 
043 
644 
645 
646 
6467 
048 





011408 
811904 
8114006 
B11e1e 
611012 
o11014 
@11016 
011420 
@11422 
011924 
011426 
@11e3e0 
011032 
A11034 
#11036 
#11640 
011040 
11041 
611041 
#11042 
#11044 
#011946 


011256 
011452 
A119S4 
011456 
vilvee 


011262 
@11464 
#11666 
011079 


011072 
611074 
e11076 
P1liee 
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#11000 
o44104 
169023 
098308 
088249 
030402 
096307 
177777 
000009 
80089 
8°0000 
068000 
#280000 
3800000 
080309 
011162 


601 
090000 
177570 
177578 


BAOHAP 
148000 
049000 
320009 
62av0a 


80ara0 
600330 
ovadea 
a0as0a 
000A02 


070400 
340500 
anaaads 
92000 


1775608 
177562 
177564 
177506 


030901 


e7eo4se 
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y DH11 INTERFACE SEPVICE PARAMS 
PAI TIP iiiiisiiiiiyitiiiiiiy | 
2211000 
Ow4is eASCIZ s/0H / sISR NAME 
BAs 160020 38US ADDRESS 
RIVs 300 sVECTOR ADDRESS 
PRIOR: 240 sPRIOPITY 
PARAM1: @ sPAPA™ 64 
PAPAW2: 006307 sPARA™ 62 
PARAMS: 19797777 sPARAM 03 
IRDAS e WORD e sTNITIAL READ DATA ADDRESS 
IXDAS WORD @ sINITYAL XMIT DATA ADDRESS 
SETTLEs ,WOPD Qa sLINE SETTLE DELAY FLAG 
2 ORD e 3 
B2016: ,wORD a sADOR OF BIN TO OCT TYPE ROUTINE 
TIMES 40RD () s TIMER 
e#ORD ® 3 
2#0RD START sADDR OF START OF PROGRAM 
TX, TERM: 
eAYTE ere sTRANSMITTEP TERMINATING CHAR, 
PX, TERM: 
eSYTE OA sRECEIVER TERMINATING CHAR, 
FLAG: e*ORD @ 


Sure 177570 


DISPLAY:177$70 

PFESSSHSSSHSSSSHSSSSHSSHSHSSHSHSHSHSHSHSSSHSSEFSSHSSHSSHSHSSSSSSHSHHSSSOSHSSHSSHOS 

3 CONSTANTS @ wORKING STORAGE 

POESSSSSHSHSSSHHSSSHSSHSHSSSSSHSHSESSESSSHSHHSHSHSSHSHSHFSHOSCHSSHSSHSSHSESHSSOS 
STATsRO 
XFLGs1e@0000 sXMIT COMPLETE FLAG 
RFLG84090@ sRCV COMPLETE FLAG 
DSFLGs2ve0e sDATA SET STATUS CHANGE FLAG 
BIT13820000 sINHI®IT PRINTOUTS 

SXCSR: @ sSAVED XmIT CSR 

SRCSR: © sSAVED eacCv CSR 

ERCSP: @ sRPCV CSF SAVED ON ERROR 

ErDBP: @ sRCV DATA REG SAVED ON ERROR 

DSSTATs @ sRCV CSP SAVED OWN DS CHANGE 

uces a :XMIT CHAR COUNT 

RCC! re sRCV CHAR COUNT 

PDAs a sRCV DATA ADOP, 

XDA3 ” sXMIT DATA AOOR, 

TFS: 177S56a 


TBS 177562 
TPSs 177564 
TPB: 177566 


FULL OUPLFXeHenrel 


mi 
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649 
650 
6$1 
6$2 
6533 
654 
655 
656 
6$7 
658 
659 
660 
661 
662 
663 
664 
665 
606 
667 
408 
669 
670 
671 
072 
673 
674 
675 
676 
677 
678 
679 
68a 
691 
682 
683 
684 
665 
HAG 
687 
BAK 
089 
690 
691 
692 
693 
694 
695 
696 
697 
698 
699 
Tea 
7e1 
702 
703 
704 


011102 
#11104 
Gillie 
@11114 
011122 
011124 
#11130 
11134 
O1liéy 
011144 
#111540 
€11154 
@1116¢ 
011164 
011170 
011174 
011262 
@11210 
11212 
711214 
011216 
A11220 
611224 
11236 
11232 
#11234 
011236 
011248 
011242 
11246 


@1125a 
#11254 
611260 
A11264 
611270 
011272 
811276 
#11302 
911304 
#11314 
11314 
G11316e 
611322 
#11326 
011330 
011334 
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000240 
A17700 
a427aa0 
013742 
612722 
013722 
012722 
#13722 
o137046 
@13714 
013702 
042782 
614264 
#12714 
453714 
053764 
123727 
181402 
dosved 
020776 
o14ede 
o127Aaa 
613701 
avS781 
@014¢03 
206 30v 
OOS 3Aa1 
4vo773 
810037 
812600 


005037 
005937 
005037 
232700 
091402 
600137 
932700 
@01402 
#00137 
032700 
#01402 
000137 
8327998 
0014082 
090137 
Arevoo 
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99320 


177734 
177400 
411006 
0140660 
@11V¥10 
013510 
#11010 
a110064 
611012 
#11014 
hel 2 | 
PBBAGY 
AAQAeA 
@11A12 
A11916 
o1iv12 


ad04e1 
11032 


013734 


011032 
013140 
013144 
AVO001 


011446 
@OAAPAR2 


011340 
avbeviv 


11544 
OVOAA4 


@11774 


eneens 
evevi7 


ASeAUGS76 49350 PAGE 


POSCSCOOSH SOOO TOSSES OTHOSSS OSE OOOESOSSSOSSOSOOEOOESESEHOTOOOOOOS 
DH11exX INTERFACE SERVICE PO'NTINE 
FOCSOCSCSOOSOSSS SSO SSH THSCO SOT SH OSH OSOOSOOSHOSHEOCSSOCORSOCOSESOOS 


5 
START? 


28: 


383 


NOP 
MOV 
BIC 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
KOV 
BIC 
MOV 
MOV 
BIS 
BIS 
c¥PB 
BLOS 
HALT 
BR 
MOV 
MOV 
MOV 
TST 
RFG 
ASL 
DEC 
BR 
MOV 
“OV 


@Sur, Re 
6177400, 

RIV, R2 
ePTSR, (R2)¢ 
PRIOR, (R2)¢ 
OXISR, (R22) 
PRIOR, (R2)¢ 
BA, R4 
PARAM], @PRCSR 
PARAM2,R2 
60001,R2 

R2, 

e4C,@RCSR 
PARAM1, ®RCSR 
PARAM2,LPR(R4) 
PARAM1,8617 

is 

ec2 

kA,°(SP) 
61,R0 
PARAM1,PF1 

Pi 

3$ 

Ra 

Ri 

2s 

RA,BART“P 
(SP),RA 


sSETUP “ODE IN RO 
Ra sSTRIP JUNK 
3; SETUP 

s INTERRUPT 

s VECTORS 

3 


3 

sSETUP BUS ADDR INDEX 
sSETUP VARIABLES 

3 


3 
XCSR(R4);IN CSR°S 


sNUMBER IN PARAM] IS TOO LARGE} 
sMUST BE 17 OR LESS (LINEs IN OCTAL) 
3SAVE RO 


sCALCULATE PAP BIT 


FOESCCCSSOSOSSO SS SOOCHSSEHOOSSSHSSETOHSOEOD 
ROUTINE USED TO GOTO 
SUBROUTINE DEPENDENT 
ON MODE SELECTED, 

PSOSOCSSS HO SOHO HOSES OSOHOHTECOCOVESSCOOS 


Gs 


283 


CLR 
CLR 
CUR 
BIT 
bEO 
J¥P 
bIT 
BFQ 
JMP 
KIT 
BEQ 
JMP 
AIT 
BEQ 
J¥P 
HALT 


TIME 
DELAY 
STOP 
e0e0,”00 
is 

s0w0 


eOwl, “ODE 


28 

sOwl 
eILB,¥*OD 
38 

sILB 


E 


@XLB,MODE 


4s 
$XLA 


ae 


A2 
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OZOHLB, P11 OSeAUGS7T6 99220 
705 011336 000776 BR 02 
706 
707 
78 
709 
710 FSSSSSCSSSSHSSSHSHSSSSSHSSSSVSESSHSHSHSHSHSSHSHHSSSHSSHSSHSSSHHSSHHSSSSSSHHHOCECS 
711 ’ ROUTINE USED IF “ONE WAY IN" MODE WAS SELECTED, 
712 : NOTE THAT WHEN IN THIS “ODE HALF DUPLEX IS THE 
7113 ’ ONLY “ODE AVAILABLE, 
714 : "ONE WAY IN" MEANS THAT ONLY THE RECEIVER 18 
715 3 ENABLFD, THE TRANSMITTER IS NEVER “TURNED ON®, 
716 PSSSSSSSSSSSSSSSHSSSSSSSHSSHSSHSHSSSSHSSHSSHSSSCHSSSHSHSHSSSHSHSCHSSHSSHSSSHSSHSECE 
717 
718 
719 
724 #11340 1094416 sOWIs KBDIN 
721 11342 094737 013746 JSR PC. STAPTR 
722 011346 932780 940200 1838 BIT ORFLG, STAT 
723 @11352 001013 BNE 28 
724 @11354 623727 11°32 @ne19a cup TIME, 0100 
725 #11362 103771 BLO is 
726 8113604 11402 MOV @RCSR,R2 
727 #11306 #16403 eeeeeo MOV XCSP(R4),R3 
728 11372 1234021 HLT 1 
729 @11374 40$037 011932 CLR TIME 
73@ 11804 00762 BR is 
731 
732 @11402 932777 @ee200 177434 283 BIT @NODAT, @SuR 
733 M1141 901002 BNE 38 
734 @11412 904737 012364 JSR PC, TESTD 
735 @11416 0427320 940000 383 BIC eRFLG,STAT 
736 #11422 932777 eeAu2e 177414 BIT LOOP, @SuR 
737 011430 901405 REQ 4s 
738 114632 12737 11444 013142 MOV 048,B8ACK 
739 11440 960137 612224 JMP f0P 
740 11444 #00735 483 BP sOw! 
741 
742 
743 PESSSSHSSSSSSHSSHSSSHSHSSSHSHSSHSSSSSHSHSSSHSHSHSHCSHSHSSHHSSHSSSSHSSHSCHSSSSSESOOES 
744 ; POUTINE USED IF "OWNF WAY OUT® WAS SELECTED, 
745 : NOTE THAT wHEN IN THIS “ODE HALF DUPLEX 1S THE ONLY 
746 ’ MODE AVAILABLE, 
147 ; "ONE WAY OUT* MEANS THAT ONLY THE TRANSMITTER I$ 
74R ’ ENABLED, THE RECEIVER IS NEVEP “TURNED ON, 
749 PFSCSSSSSSHSHSSSSHSSSHSSHSSESSHSSSSSHSSSHSSHGHSHSHSSSHSSSSSSSHSHSSHSSHSSHSCSSSSCSSCHSCOOOS 
752 
751 #11446 104416 6On0s KeDIN 
752 #11456 984737 013146 JSR PC, STARTX 
753 0119454 905037 011032 CLR TIME 
754 011460 32708 i1¥vuee 183 BIT ®XFLG, STAT 
755 11464 #01013 BNE 28 
7$6 #11466 623727 011032 #aeiva c™P TIME, 8100 
757 @11474 1983771 BLO 18 
758 011476 11482 MOV @RCSR,P2 
759 #11500 916483 asere0 “OV XCSRC(R4),R3 


762 811504 104021 HLT 1 B2 
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761 
762 
763 
Te4 
765 
706 
767 
768 
769 
770 
771 


011506 
@11512 
@11514 
611520 
011526 
@11530 
011536 
011542 
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005037 
080702 
042700 
032777 
001425 
012737 
000137 
ovv7di 


@11542 
012224 


177316 
013142 
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CLR 
BR 

eric 
BIT 
BEQ 
MOV 
JMP 
BR 


TIME 

is 

OXFLG, STAT 
@LOOP, @SWR 
38 
@38,BACK 
EOP 

6000 








DH11 TTEP OVER 
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772 

773 

774 

775 

7176 

777 

778 

779 

780 

761 

762 

763 #11544 
784 611546 
78S 011552 
7866 011556 
787 611562 
7ee 11564 
wag) «611572 
790 011574 
791 #11576 
792 911602 
793 #11604 
794 @1lelYy 
795 411612 
796 611620 
797 @11622 
798 #11626 
799 #11632 
ROA 11640 
821 811642 
802 11650 
803 911054 
804 #11662 
825 611664 
896 811670 
807 11674 
B8e8 #11760 
809 11702 
81% 011704 
811 011710 
812 #11712 
813 #11716 
Ai4 011720 
815 #11724 
816 411739 
817 011734 
816 11736 
819 911744 
A20 411746 
821 011750 
A22 #11754 
823 #11756 
824 11762 
825 #11764 
826 611770 


Lay 
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194416 
004737 
0925437 
032780 
021013 
@23727 
103771 
011402 
0164603 
104701 
005037 
800762 
032777 
0014902 
@v4737 
42744 
032777 
ovi4eas 
012737 
040137 
032777 
41416 
013742 
913703 
018337 
112223 
@¥1376 
1127463 
005203 
112723 
1085323 
845337 
004737 
032709 
031013 
@23727 
103771 
#11402 
016403 
144401 
965037 
030762 
942704 
000137 


013746 
#11432 
e4uave 


011032 


ArAAAA 
#11932 
000264 
012364 
a4eAve 
260020 
11654 
12224 
020400 
@1102¢ 
@11022 
@119070 
@¥8177 
a0@177 
11432 
¥v13146 
1Avvo¢ 


#11932 


1A@°08 
@11544 


40100 


177224 


177204 


013142 
177162 


800100 
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PIP PPP TPP iiiritiiiitiiiiii it 
ROUTINE USED IF INTERNAL LOOP BACK® WAS SELECTED, 
WOTE THAT WHEN IN THIS MODEs HALF DUPLEX I§ THE 
ONLY MODE AVAILABLE, 
“INTERNAL LOOP BACK" MEANS THAT THE RECEIVER IS *TURNED ON® 


IT IS; IF “FND PASS" IS DESIRED: IT IS GIVEN, 
THEN THE TRANSMITTER IS ENABLED, AFTER THE WHOLE MESSAGE 
TS TRANSMITTED; THE CYCLE IS REPETED AS ABOVE, 


i 

3 

3 

3 

’ AND A COMLPETE MESSAGE I§ RECEIVED, IF DATA Ig TO BE CHECKED 
5 

‘ 

a 

5 


STLB: KPOIN 
JSR 
CLR 
183% BIT 
BNE 
cP 
RLO 
MOV 
MOV 
HLT 
CLR 
BR 
283 BIT 
BNE 
JSPR 
383 BIC 
BIT 
BEQ 
MOV 
J“pP 
4s% sIT 
BEO 
MOV 
“OV 
“OV 
MOVB 
BNE 
“OVB 
INC 
MOVB 
CLRB 
783 CLr 
JSR 
583 BIT 
BNE 
c™P 
BLO 
“OV 
MOV 
HLT 
CLR 
BR 
683 atc 
JMP 


PC, STARTR 
TIME 
@PRFLG,STAT 
26 
TIME,010¢ 
is 

@RCSR,R2 
XCSR(R4),R3 
t 

TIME 

is 

ONODAT, @SWR 
38 

pc, TESTD 
@RFLG, STAT 
@LOOP, @SwR 
46 

048,B8ACK 
EOP 

e40aa, @Swr 
78 

IRDA, R2 
IXDA, R3 
R}3, XDA 
(P20, (RI)¢ 
72 

e177, @(R3) 
R3 

6177, (R3)¢ 
(R3)6 

TIME 

PC, STARTX 
@aFLG,STAT 
6s 

TIME, 81900 
$$ 

@RCSR,R2 
XCSP(R4),R3 
i 

TIME 

58 
OXFLG.STAT 
sILB 


sUSE EXTERNAL DATA? 
sBR IF NO 

sSET POINTER 

sSET POINTER 

sSETUP X™IT DATA ADOR 
s“OVE INPUT TO OUTPUT 
sLOOP IF NOT ZERO CHAR 
sINSERT A FILL CHAR 
;BU“P ADORESS 

s INSERT ANOTHER FILL 
sINSERT ZERO CHAR 


D2 
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827 ASPET riiiisiiiiiiiriiirrirritiirirrrttty 

828 ’ ROUTINE USED IF "EXTERNAL LOOP BACK" was SELECTED, 

829 ? EITHER PALF OR FULL DUPLEX MAY BE SELECTED IN THIS MODE, 

830 ? "EXTERNAL LOOP BACK" MEANS THAT THE TRANSMITTER IS FIRST 

631 , TURNED ON (IF HALF DUPLEX) AND THE WHOLE MESSAGE Ig TRANSMITTED, 

832 f THEN THE PECEIVER IS ENABLED, AFTER THE WHOLE MESSAGE I8 RECEIVED 

833 ] DATA WILL THEN BE CHECKED If DESIRED AND END PASS wILL 

934 3 BE GIVEN IF DESIRED, THEN THE CYCLE I8 REPEATED 

835 ’ AS ABOVE, IF RUNNING IN FULL OUPLEX THE PROGRA™ 

636 $ WAITS FOR BOTH THE RECEIVER AND TRANSMITTER TO 

837 2 FINISH THEN RESTARTS THE RECEIVER AND TRANSMITTER, 

8 38 FSESSSSSSHSSHSSSSSSESESSSHSHSHSSHSHOHSHSSSSHSSSSHOSHSOSOSSSHSSHSHSSSESHEEEESS 

639 

840 811774 104416 SXLB: KBDIN 

841 @11776 632737 @4000@0 011014 BIT @HALF DUPLEX, PAPA“2 

642 812484 @ed1d02 BNE is 

643 812006 004737 913746 JSR PC, STARTR 

844 612012 o4737 013146 18% JSR PC, STARTX 

645 612016 045437 011032 CLR TIME 

846 812022 432733 108000 283 BIT OXFLG, STAT 

647 812026 90281016 BNE 38 

848 #12030 632768 Asarea 783 GIT @RFLG,STAT 

849 912034 9801924 BNE 4g 

85@ 012036 023727 #11732 enriee cmp TIME, 0100 

851 012044 183766 BLO 28 

852 @12840 011482 MOV ORCSR,R2 

853 A1205@ 016433 wHeave MOV XCSR(R4),R3 

854 ©12054 194021 HLT 4 

855 612056 645437 411032 CLR TIME 

856 012062 9300757 BR 28 

857 #12064 632737 asevem 611014 383 BIT sHALF DUPLEX, PARA“2 

958 912072 9601756 BEQ 78 

$9 812074 942702 1249000 BIC @XFLG,STAT 

R60 8612100 64737 013746 JSR PC. STARTR 

661 6812144 804740 BR 28 

862 @12106 632737 w4erea 611014 483 KIT @HALF ,DUPLEX, PARA“2 

863 612114 gviAav BNE es 

864 12116 832704 18290000 BIT 8XFLG,STAT 

86S 612122 98@1¥13 BNE 68 

866 812124 023727 11332 earlier CMP TIME,8100 

867 #12132 103765 BLO 48 

868 #12134 911402 “OV @RCSR,R?2 

S63 812136 916443 we@e0ve MOV XCSPR(R4),R3 

874 812142 104401 HLT 1 

871 @12144 605537 011032 CLR TIME 

872 @12158 800756 BR 4% 

873 812152 942784 199000 683: BIC eXFLG,STAT 

874 612156 #42744 véavrue ess BIC @RFLG,STAT 

875 612162 905037 411032 CLR TIME 

876 #12160 0632777 ave2ve 176650 BIT @NONAT, @SaR 

877 @12174 941002 BNE $s 

878 A@12176 44737 12364 JSP ec, TESTD 

879 #12202 632777 @00720 176634 583 BIT SLOOP, @SaR 

880 #12214 O8¥1071 BFQ SXLb 

861 912212 012737 @11774 13142 MOV @SXLB, BACK 


082 012220 @ve137 012224 ump EOP £2 











LLL LL = 
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883 
6e4 
865 
866 
887 
868 
ae9 
290 
ao1 
692 
693 
894 
995 
896 
897 
898 
699 
900 
901 
902 
903 
904 
905 
906 
907 
9ue8 
909 
9108 
911 
912 
913 
914 
915 
916 
917 
918 
919 
920 
921 
922 
923 
924 
925 
926 
927 
928 
929 
93a 
931 
932 
933 
934 
935 
936 
937 
938 


912224 
612224 
412233 
012236 
#12244 
0122582 
612264 
#12204 
612270 
012274 
01230a 
@12304 
G1231@ 


#12312 
012312 
012316 
#12322 
012326 
#12332 
012336 
#12342 
012350 
012356 
012362 


912364 
012378 
612372 
912400 
012442 
612496 
#12412 
12414 
612429 
012424 
012430 
012432 
012434 
012449 
012442 
012446 
012450 
012454 
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106414 
616437 
042737 
642764 
012766 
#10837 
010137 
010237 
016337 
0190437 
010537 
030207 


013709 
@137a1 
013702 
013703 
613704 
013785 
012737 
053704 
a00177 
0804098 


#13746 
001413 
@32777 
001307 
104400 
004077 
095746 
104408 
013701 
013702 
122122 
@A1776 
4923741 
ovi44? 
122742 
091005 
018237 
1044008 


MACY11 27(1906) 


09:20 


A006 340 
420000 
197777 
020009 
012312 
013124 
013126 
@13136 
013132 
013134 
#13136 


e13124 
013126 
0131308 
013132 
@13134 
013136 
1797777 
#12362 
avesoe 


011456 
020009 


012564 
176416 


012645 
@11A22 
@11020 
011040 
A9AAR2 


012456 


#12362 
012362 
e7ee0a 
HPerR2 


013140 
0460000 


176444 


ASeAUGS76 09:50 PAGE 20 


’ ROUTINE TO RETURN 
i] TO MONI TOP FOR 
| END Pass, 
PSESSSSHSSSSSHSSSSSCSEESHSCHSHEOS 
EOP: 
STFPS,PPTY? 
“OV XCSR(R4), QTPIE 
BIC e°C<TIE>, ATPIE 
BIC OTIE, XCSR(R4) 
MoV sENTER,2(SP) 
“OV RO, SAVRO 
MOV Ri, SAVRI 
“OV R2,SAVR2 
MOV P3,SAVR3 
MOV R4,SAVR4 
MOV RS,SAVRS 
RTS pc 
ENTERS 
“OV SAVRO,RY 
MOV SAVR1,RI1 
¥woV SAVR2,R2 
~~ MOV SAVP3,R3 
MOV SAVR4,R4 
MOV SAVPS,RS 
woVv e°1,DELAY 
BIS QTPIE,XCSR(R4) 
oMep @BACK 
QTPIEs: @AAve? 


:SET PS PRIORITY TO 7 


sSAVE TX CSR 
sCLEAP ALL 6UT 


Tx TE, 


sCLEAR TX IE (EVEN IF IT WASN°T SET) 
3SET FOR PETURN IF Sw 1481 


sSAVE REGISTER 
sSAVE REGISTER 
sSAVE REGISTER 
sSAVE REGISTER 
sSAVE REGISTER 
sSAVE REGISTER 


1 
2 
3 
4 


w 


sRETURN TO CONTROL PROGRAM 


sRESTORE RO 
sRESTORE Ri 
sRESTORE RQ 
sRESTORE R3 
sPESTORE RG 
sRESTORE RS 


sIF ORGINALLY SET; SET TX JE 


3@AS THERE A RECEIVE ERPOR? 


WAS A PECEIVE ERROR, RBUFs 


2 SUBPONTINE TO CHECK 
? RECFIVER DATA, 
FSSSHSSSSSSSSSHSSHSSSHSSHHSSSSHSSOSHOHE 
TESTOs MOV ERDBR, (SP) 
BEQ TSTDAT 38R IF NO 
BIT e81T13,@SWr ps INHIBIT PRINTOUTS? 
BNE TSTDAT 28rR IF YES 
TYPE o“4sGe 3€15>¢]2> THERE 
JSR RO, ®B2016 sPRINT CONTENTS OF RBUP 
TST °(SP) 
TYFF o“S8G1 3<15><12> 
TSTDAT: MOV IXDA, Ri sSETUP XMIT DATA ADDR 
MOV IRDA, R2 sSETUP RCV DATA ADDR 
SCAN4: CPR (Pide, (RQ)¢ sDATA OK ? 
BEQ SCAN4 38R IF OK 
CMPR TX, TERM, -(R1) 31s If END OF DATA 
BEQ TESTOX 38R IF YES 
C™PB 6902,¢e(R2) 
BNE 28 
“OV P2,18 
TYPE 


F2 





DHil ITEP OVER 
DZOHLB,Pit 


939 012456 
940 612460 
941 612462 
942 612462 
943 612464 
944 #12406 
945 012472 
946 012474 
947 012476 
948 012502 
949 012504 
950 812506 
9S$1 12514 
982 #12516 
953 612522 
954 412530 
98S 612532 
956 #12534 
957 012540 
956 612546 
959 012550 
968 #12552 
961 812554 
962 612556 
963 #12560 
964 812562 
965 


966 
(1) 
(1) 
(1) 
(1) 
q1) 
(1) 
(1) 
(1) 
967 
908 
969 
970 
971 
972 
973 
974 
975 


@12564 
012645 
012659 
012675 
012720 
012767 
0130852 


013124 
013126 
613130 
013132 
013134 
#13136 
13140 
913142 
ai3ies 


LAY 
OS eAUGOT76 


006400 
003437 


188712 
601435 
122721 
081756 
005301 
122722 
001752 
000240 
032777 
001316 
18¢40a 
013737 
104400 
000000 
1044048 
013737 
104400 
0114622 
111103 
114202 
104007 
405726 
0002387 


085915 
ais 


045415 


aeea0r 
avaves 
aveseu 
200000 
enaseu 
Bveoua 
evedses 
830900 
aeevea 


MACY11 27(1006) 


000177 
600177 


026808 


0126Sa 
@11020 


012675 
@1122 


044124 
AGOR12 
042522 
442012 
46120 
@53412 
0460124 


176330 


012532 


012550 


042503 
#32101 
040505 
042510 
44eSe5 


OSeAUG=76 69:50 PAGE 21 


SCANSS 


RDAX3 


DERR? 


TESTOXs 


“SGe% 
MSG18 
MSG23 
MSG38 
MSG48 


MSGS! 
eo EVEN 
SAVPO: 
SAVRIis 
SAVP2: 
SAVR33 
SAVP4: 
SAVPS: 
DELAY: 
BACK? 
STOPS 


TSTB 
BEO 
C™PB 
BEO 
oEC 
C!PA 
BEO 
NOP 
BIT 
BNE 
TYPE 
MOV 
TYPE 
@ 
TYPE 
MOV 
TYPE 
IXDA 
“Ove 
MOVB 
HLT¢? 
TST 
RTS 


eASCIZ 
eASCI2Z 
eASCIZ 
eASCIZ 
ASCII 
eASCIZ 
eASCIZ 


@ 
TESTOX 
(R2) ] 
TESTOX 38R IF YES 
0177, (PL) 218 IT FILL CHAR? 
SCANG 38r IF YES 
Ri sBaCKkuP 
e177, (R2)¢ sI8 If FILL? 
SCANG 38r IF YES 
sDATA ERROR 
eB8IT13,@Swr sINHIBIT PRINTOUTS 
DOERR 38h IF YES 
o48G2 3415><€42>RECEIVED DATA & <45>¢€12> 
IRDA, RDAX sSETUP DATA ADRESS 
sPRINT RECEIVED DATA 
sRECETVED DATA ADDR, 
o”SG3 9€15><€12>0ATA SHOULD RE<15><12> 
IXOA, 2*10 sSETUP ADOR, 


sPRINT GOOD DATA 


(F1),P3 sSETUP XMIT DATA 


o(R2),R2 sSETUP RCV DATA 

sOATA EPROR HALT 
(SP) sPOP STACK 
pc sRETUPN FROM SUB/ROUT 


<€15><€12>/THERE WAS A RECEIVER ERROR, REGISTER (SEL 2) 2/ 
<€1$><12> 

€15>¢€12>/RECEIVED DATA & /<15><12> 

€15><€12>/DATA SHOULD BE/<15><12> 

€15>¢€12>/PLEASE “AKE CONNECTION (DIAL NUMBER),/ 

€15>¢€12>/WHEN CONNECTION COMPLETE, HIT CONTINUE SWITCH, /<€15><¢42> 
€15>¢€12>/PLEASE MAKE CONNECTION (OIAL NUMBER), /¢€15><€12> 


G2 


DHii1 ITEP OVERLAY MACY11 27(16006) @S5eAUG*76 69:50 PAGE 22 Of @924 
OZOHLB PI OSeAUGCTI6 09320 

976 FOESSSSSSHSSHSHHSHSSHHSHOHHSHSHHHHHHHSSSHHSHOSHSSSHHSSHEESHHOH EO HSCHHCHOES 
977 ] TRANSMITTER INITIALIZATION SUBROUTINE 

978 PRISE STII riiiiiisiiriviiririititiit) 
979 

980 013146 685737 011024 STARTX: TST SETTLE 

901 @613152 601404 BNE 68 

982 #13154 905737 13140 TST DELAY 

983 #13160 6019015 BNE $8 

984 613162 600434 BR is 

985 #813164 605037 41373u 683 CLR TEMP) sPREPARE FOR DELAY 
986 613179 0612737 600007 813732 MOV 67, TEMP? 

987 813176 662737 afAee1 613730 aod 61, TEP! sINC DELAY 

906 013204 001374 BNE 276 

969 813206 ©805337 0613732 DEC TEMP2 

990 0613212 021371 BNE o7l4 

991 013214 6395937 #13730 583 CLR TEMP) sPREPARE FOR DELAY 
992 813228 612737 @80707 413732 MOV 07, TEMP2 

993 @13226 962737 @@@ve1 413730 ADO 01, TEMP sINC DELAY 

994 #13234 901374 BNE 276 

995 813236 005337 613732 bec TEmMP2 

996 013242 601371 BNE 27i4 

997 813244 675937 613140 CLR DELAY 

998 6813250 675437 #11424 Cur SETTLE 

999 13254 632737 aésév00R 11014 183 BIT OHALF ,.OUPLEX, PARA™2 sHALF OUPLEX? 
1690 613262 681444 BEO 4G 38P IF NO 

1001 6132604 613746 y2ene4 MOV @04,°¢(SP) sSAVE LOC 4 

1042 @13274 013746 00306 MOV @86,-(SP) sSAVE LOC 6 

1603 @13274 612737 013352 evened MOV 636,004 sSET UP TRAP CATCHER 
1904 013302 75037 eKvene6 CLR 606 sCLEAR VECT¢2 
10605 #133806 095737 013144 TST stop sFPIRPST TIME HERE? 
1996 613312 081487 BEG 8 36r IF YES 

16007 013314 #12737 <w777T «013144 MOV e°1,STOP 

1098 613322 632777 adseliee 490406 BIT 6100,@0MBB sCARRIEP UP? 
1909 @13330 9601374 BNE 276 sQR IF YES 

101@ 613332 052777 afg004 90376 683 BIS eBIT2,60M8B sSET POTS IN OMBB 
1911 13345 832777 909040 40370 26: BIT e8I1TS,@0%AB sSPIN O®% CTS 
1912 013346 #1774 BEG 28 

1013 613359 024646 Cp ©(SP),°( SP) sADJUST STACK 

14614 013352 #22026 383 Cc¥p (SP)o,(SP)¢o 3POP STACK 

1091S 813354 812037 w#0a0v6 MnV (SP)o,@86 sRESTORE LOC 6 

1016 013360 612637 @efenv4 MOV (SP)o,084 sRESTORE LOC 4 

1217 813364 613737 #11422 @11078 46:3 “OV IXDA,XOA 3SET UP XMIT DATA ADD 
1418 #13372 942794 ivvev0e BIC @XFLG,STAT sCLEAP XFLG 

1019 0813376 613764 @1107@ e@Fe0%6 MOV XDA,CAR(R4) sLOAD CURRENT ADDRESS REG 
1923 013434 632737 ad4aaege 911014 RIT OHALF DUPLEX, PARAM2 sMALF DUPLEX? 
1021 #13412 0019822 BNE 78 38R IF YES 

1022 €13414 632732 eeere4 BIT @XL8,“ODE 3XL® MODE? 

18923 013420 9v1417 BEQ 78 38R IF NO 

1924 0613422 012737 177777 «40613742 MOV @°1, TRNFLG SET SOFTWARE FLAG 
1925 13434 12764 177777 aennle MOV ee], 8CP(R4) 

1626 013436 952714 #20e00 BIS eTIE,@RCSPR 

1027 013442 @137604 013734 a9¢ai2 “OV BARTMP, BAR(R4) 

1028 613450 9230901 WAIT 

1029 013452 0605737 013740 TST SNCFLG s4AS PECEIVER GOT FIRST CHAR? 
1030 613456 681375 BNE 3NO WAIT FOR IT 


o4 
1031 613469 613764 611070 Pe0re6 783 MOV XDA,CARCR4) sLOAD CURRENT ADDRESS REG iL 





7 


OH11 ITEP OVERLAY 
DZOHLS P11 


1632 
1833 
1634 
1035 
1036 
1037 
1836 
1439 
104¢@ 
1641 
1042 
1943 
1046 
1045 
1046 
14467 
1048 
1049 
19520 
10St 
1052 
18053 
1054 
1055 
1956 
1087 
1498 
1089 
1400 
1¢61 
1062 
1063 
1664 
1765 
1966 
1467 
1068 
1069 
1970 
1071 
1072 
1073 
1074 
1675 
1076 
1077 
1076 
1979 
1660 
1081 
1062 
1083 


013466 
#13474 
613500 
013506 


013514 
013514 
#13520 
613522 
#13524 
013526 
0133530 
013534 
013536 
a1354e 
613546 
013550 
013554 
013569 
#13566 
613570 
013574 
013600 
013646 
13612 
913624 
013622 
413624 
013630 
013634 
013636 
013644 
013046 
013652 
013654 
#13662 
013666 
013674 
#13700 
013702 
9137190 
013716 
013722 
013726 
013730 
@13732 
013734 
013736 
013740 
013742 
013744 


OS eAUGOT6 


012764 
052714 
013704 
689207 


042714 
032714 
001407 
611402 
085003 
1840198 
104404 
063d04 
000776 
127737 
601033 
oS27aa 
042714 
032737 
081422 
013746 
013746 
012737 
005037 
@42777 
024646 
022626 
012637 
012637 
680430 
032777 
0814096 
108777 
100083 
117777 
@95237 
013704 
945737 
001506 
012764 
013764 
0¥$037 
605037 
Odd0a2 
oe esAa 
040000 
edarAna 
178502 


013746 


MACY11 27(1006) 


09:20 


177777 
O20000 
013734 


014337 


175324 


10@v04 
“20008 
e4a000 


080004 
GAGAVS 
#13622 
OF UAV6 
08404 


090006 
aveee4 


A?B108 
178224 


175210 
@11a7ea 
ai1e7ea 
#13742 


177777 
013734 
#11032 
013742 


@11014 


evgaes 


17520¢ 


175216 


000010 
90012 


@SeAUG*76 69:50 PAGE 23 


MOV 
BIs 
aOV 
RTS 


XTSP3 BIc 
BIT 
BEO 
MOV 
CLR 
HLT 
TYPE 
HALT 
BP 
183 C¥PB 
BNE 
BIS 
BIc 
BIT 
bEQ 
MOV 
MOV 
“ny 
CLR 
BIC 
cMP 
283 c™eP 
¥wOV 
MOV 
383 BR 
XISRi: BIT 
BEQ 
TSTA 
BPL 


MOVB 


WOXMON? INC 
MOV 
TST 
BNE 
MOV 
MOY 
XIsP2t CLR 
CLR 
RTI 
TEMP130 
TEMP2:e 
BARTMP: @ 


DMBBs 174502 


SNCFLG: @ 
TRNFLGs @ 


FILLs e BYTE 


oEVEN 


@o41,B8CR(R4) sLOAD BYTE COUNT REG 
@TIE, @RCSR 9SET INTERUPT ENABLE 
BARTMP,BAR(R4)  3LOAD BAR REG 
ec 
eTI,@RCSR sCLEAR XMIT DONE 
eVEM, ORCSR SNONCEXISTENT MEM ERROR? 
18 s8R IF NO 
erga: sSAVE CSR FOR TYPE OUT 
i 
1@ sERPOR HLT 
oNONEX sTYPE ERROR MESS 
ee 36P HALT 
@XDA, TX, TER™ 328 CHAR TERMINATION CHAR? 
XISP) 28r IF NO 
OXFLG,STAT sSET XMIT DOWE FLAG 
eTIE,@RCSR sCLEAR INTERRUPT ENABLE 
GHALF ,OUPLEX, PARAM2 sHALF DUPLEX? 
38 36P IF NO 
@64,°¢(SP) sSAVE LOC 4 
006,°(SP) sSAVE LOC 6 
026,084 sSET UP TRAP CATCHER 
086 sCLEAR VECT?2 
CBIT2,@DMAB sCLEAR ROTS 
@(SP),e( SP) sADJUST STACK 
(SP)¢, (SP) 3P0P STACK 
(SP)o,@06 sRESTORE LOC 6 
(SP)o,@8¢ sPESTORE LOC 4 
XISP2 
6100, @SwP sMONITOR XMIT DATA? 
NOX“ON 38P IF NO 
eTes sTTY READY? 
NOXMON 38r IF NO 
@XDA, ®TPB sTYPE CHAR 
XDA sINC TXBUF POINTER 
XDOA,CAR(R4) sLOAD CURRENT ADDRESS REG 
TPNFLG 31S THIS FIPST TIME? 
xIgr2 3Br IF YES 
@-1,8CR(R4) sLOAD BYTE COUNT REG 
BARTMP,BAR(R4) SET BAR BIT 
TIME 
TRNFLG 

sLINE STATUS REG IN DwBB 
177 


EE ee 


OH11 ITEP OVERLAY 
OZONLB Pit 


1004 
1085 
1066 
1067 
1968 
1089 
1990 
1991 
1092 
1093 
1094 
1095 
1096 
1097 
1498 
1099 
1103 
1101 
1102 
1103 
1104 
1105 
1106 
1107 
1108 
1109 
1112 
141 
1112 
1113 
1114 
1115 
1116 
1117 
1118 
1119 
11208 
1121 
1122 
1123 
1124 
1125 
1126 
1127 
1128 
1129 
1138 
1131 
1132 
1133 
1134 
1135 
1136 
1137 
1138 
1139 





013746 
413754 
013756 
013762 
013704 
013770 
0137746 
013776 
014082 
014010 
@14016 
814024 
014030 
014034 
014040 
014044 
014052 
014056 


014060 
014064 
014866 
614070 
014072 
014974 
014100 
014102 
014104 
014110 
014114 
614116 
014120 
614122 
014124 
014126 
014132 
014134 
14140 
014144 
#14150 
014156 
#141690 
014164 
014166 
#14172 
#014176 
614202 
014206 
014210 
814212 
014214 
614216 


@SeAUGOT6 


032737 
001010 
0327008 
001405 
0050937 
005237 
001375 
042700 
013737 
012737 
#12737 
405337 
605037 
@52714 
053714 
053764 
a52714 
600207 


932714 
001407 
011432 
045403 
1404419 
104493 
000004 
000776 
616401 
042781 
005701 
1600403 
11442 
03503 
104010 
0327a1 
OA14046 
011437 
019137 
110177 
032777 
841495 
105777 
1004902 
1139177 
003237 
19$077 
635337 
001905 
003605 
104000 
104096 
8000300 


MACY11 27(1006) 


o4Qn0n 
000004 


013730 
013730 


a40000 
011420 
001000 
177777 
@11054 
@11056 
004000 
@11012 
@11014 
0101008 


014310 


A700 


011054 
#11056 
174716 
0Aeu04dr 


174712 


174706 
@11766 
174664 
011064 


011014 


011066 
011064 
013740 


00084 


174666 


PSeAUGS76 09550 PAGE 24 


$90 0089 0000008000000 000 9000008000080 05000005 0005500085000 0008008 
’ PFCEIVER INITIALIZATION SUBPOUTINE 
FECCOHSSCHOHSHTHSHTSSOTOOO TOSS SOSH OSES SSOS ESOS SOOO SOOO COCEOOOOOO® 


STARTR: BIT 
BNE 
BIT 
BEQ 
CLR 
163% Inc 
BNE 
283 ec 
MOV 
MOV 
MOV 
CLR 
CLR 
BIs 
BIS 
BIS 
als 
RTS 


BIT 
bEQ 
MOV 
CLR 
HLT 
TYPF 
HALT 
BR 
163 MOV 
BIc 
TST 
BAYT 
MOV 
CLR 
HLT 
483 BIT 
BEQ 
MOV 
MOV 
383 MOVB 
AIT 
BEY 
TSTB8 
BPL 
MOVA 
Inc 
CLRB 
DEC 
BNE 
RESET 
HLT 
HLTo6 
HALT 


NORMONS 


GHALF ,OUPLEX, PARA“2 sHALF DUPLEX? 
28 38Rr IF YES 

@XLB, MODE 7XLB “ODE? 

28 s8R IF NO 

TEMP) sSTART DELAY 

TEMP 

Ve 

GRFLG, STAT sCLEAP PFLG 

TRDA,RDA 2SET UP RECFIVER DATA ADD 
01000,RCC SET UP BUFFER LIMIT 
@°1,S8NCFLG sS€T SOFTWARE FLAG 
ERCSR sCLEAR ERROR RECORDS 
EROBR 

eBIT11,e@RCsR “ASTER CLEAR 
PARAM,,@RCSR sSET LINE NUMBER 
PARAM2,LPR(R4) sLINE PARAMETERS 
GPIEsSIE,@rCSR SET INTERUPT ENABLES 
pe 

@SI,@RCSR sSILO OVERFLOA? 

is 38R IF NO 

@RCSP,R2 sSAVE CSR FOR TYPEOUT 
rR} 

10 sERROP HLT 

e SILO sTYPE EPROR MESS 

072 38R HALT 

NRCR(R4),RI PUT CHAR IN Ai 
8200,R1 sSTRIP A BIT 

Ri sVALID DATA? 

48 38r IF YES 

@PCSR,R2 ;SAVE CSR FOR TYPEOUT 
R3 

10 sERROR HLT 

SDOoFEoPE, Ri sOVERPUN, FRAMING OR PARITY ERROR? 
38 38R IF WO 

ercsr.ERCSR sSAVE CSR 

P1,EROBP sSAVE CHAR 

P1,@ROA sSTORE CHAR IN BUFFER 
OBITS, @SaR sMONITOR RECEIVE OATA? 
NORMON 28R IF NO 

oTPs sTTY READY? 

NORPMON s8R IF NO 

R1,@TPB s TYPE CHAR 

RDA sINC RECEIVER BUFFER POINTER 
@RDA sCLEAR NEXT LOCATION 
rcc sDEC CHAR COUNT 

18 3BRr If BUFFER NOT FULL 
e sSTOP THE SHOW,BUFFER OVERFLOWED) 


sRECEIVER BUFFER FULL 


Sz 


OW11 ITEP OVERLAY 
OZOHLB Pit 


1140 
1141 
1142 
1143 
1144 
1145 
1146 
1147 
1148 


01422¢e 
014222 
614226 
614230 
014234 
014240 
014244 
014250 
#14252 
#14310 
014337 
014373 


OS eAUGe76 


000776 
123701 
@01004 
@42714 
o527e0 
005037 
005037 
00032 
0854:5 
085015 

“15 

ais 
014454 
a0aae1 


MACY11 27(106) 


#11041 


610100 
040000 
@11932 
013740 


#51105 
0351105 
@47012 
aSeei2 


047522 
#47522 
047117 
042514 


@SeAUG"76 69:50 PAGE 25 


MFULL3 
SILO8 
NONEX8 
LINES: 
eEVEN 
eo END 


BP 72 s8R HALT 

CMPR RX, TERM, RI 31S CHAR PCV TERMINATION CHAR 
BNE RISRI 36R IF NOT 

BIC ORIECSTE,@RCSR sCLEAR INTERUPT ENABLES 

BIS ePFLG, STAT sSET RCV DONE FLAG 

CLP TIME 

aes SNCFLG sCLEAR FLAG 

RT 


eASCIZ<19>¢€12>/ERROR| RECEIVER BUFFER FULL/ 
eASCIZ<15><12>/ERROR] SILO OVERFLOW/ 

eASCIZ<€15><€12>/NON EXISTENT MEMORY ERROR/ 
eASCIZ<15><12>/PLEASE SELECT ONLY ONE LINE AT A TIME( PARAM})/ 


Kr 





DHi1 ITEP OVERLAY MACY11 27(1006) @S°AUG*76 09:50 PAGE 27 


OZDHLB P11 OSeAUGS7I6 09920 SY“BOL TABLE 

BA 011004 DSFLG = 620000 NODAT & 900200 RIV 011006 TEMP, =6—6613730 
BACK 013142 DSSTAT 0611960 WOWEX 014337 RWAIT © 1046410 TENP2 013732 
BAR 8 900012 ENTER 012312 NORMON 614172 RX,TER 611061 TESTO 612364 
BARTMP 013734 EOP 012224 NOXMON 613662 x) Bt aagnes TESTOX 612960 
BCR #8 900010 ercse 011054 WRCR s 990902 R? Sheagen? eh ® 100000 
BIT® s 680001 ERDBR 011056 Owl 8 s 600002 SAVR@ 013124 TIE 8=6—s 620000 
BIT1 s 600002 FE Bs 020000 OwWO 3 Os 8s «800001 SAVRI 013126 TIME 011032 
BITI@ = e82000 FILL @13744 PARAMi 011012 SAVR2 013130 TKS 011074 
BITi1 & o84000 FLAG 011042 PARAM2 011014 SAVR3 613132 TKS 011072 
BIT12 = #10000 FULL,Ds 900001 PARAMS 011016 SAVR4 013134 TP. 011100 
BITi3 = 920000 Go 011250 PE s 010060 SAVRS 613136 TPS G1i576 
BIT14 s 84000e HALF,De 940000 PRIOR 011010 SCAN@ 012430 TRAFLG 013742 
BITIS = 1eueea ILB 8 @00010 PRTY@ = eeenue SCANS 012504 TSTOAT 0124620 
BIT2 s 900004 IPDA 011920 PRTY1 s e90040 SETTLE 611024 TX,TER 011040 
BIT} s&s eveule IXDA @11022 PRTY2 = #00100 81 = 8409098 TYPE © 104400 
BIT¢ s 880020 KBDIN s 104416 PRTY3 s 600140 SIE s 610000 xcc 011062 
BITS s 9800460 LINES 014373 PPTYé = 090200 sILo 014310 xCsr 8 990000 
BIT6 s O8e81e0 LOOP s 900020 PRTYS s 0702460 SNCFLG 013740 RDA 011070 
BIT? s 90¥204 LPR 8 egene4 PRTY6 = 900300 SRCSP 611052 RFLG 6s 100006 
BITS s 890400 uc B 004700 PRTY? = 000346 ssp 6s 600016 ater 013510 
BIT9 s #01900 MFULL 014252 QTPIE 612362 START 011102 XIGRi =. © 1 36.396 
82016 90119030 MODE #9000000 rcc 011964 STARTP 013746 XISR2 460 1 3716 
CAR 8 @8v006 uSGA #12564 RCSP steaguns STARTX 613146 xL8 0 ss oeeee4 
DELAY #13140 “SGI 012645 RDA 011966 STAT stengona RWAIT © 104612 
DERR 012552 MSG2 012650 ROAX 012532 sToP 013146 sILe o11544 
pHi1 @1180e08 MSG3 0126075 RFLG 8 040000 STPS = 194614 sowr o11340 
DISPLA 9611046 MSG4 012720 RIE s o@viee SuPR @110464 g0wo 0114466 
DMBB 013736 MSGS 0130582 RISR 014060 S¥12 = @19”00 6XLB 011774 
po s #4000" NEM 8 #92000 RISPi 014240 SXxCSR 011050 e BS 014454 
. ABS, 0144654 vee 


ERRORS DETECTED; 2 
DEFAULT GLOBALS GENERATED: @ 


DHLB, DHLB/SOL ITEP! MAC, 0ZDHLB,P11 
PUNeTIMES 180 13 ,3 SECONDS 
RUNeTIME RATIO3 66/2582,5 

CORE USED: 16K (31 PAGES) 


